10 POKE53280,0:POKE53281,0
20 GOTO100
60 GETA$:IFA$=""THEN60
70 RETURN
100 PRINT"[147][153]        STAR TREK INSTRUCTIONS
110 [153]"        TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(
500 PRINT"[158]WELCOME TO THE UNITED FEDERATION OF
510 [153]"PLANETS. YOUR MISSION WILL BE TO SEEK
520 PRINT"OUT AND DESTROY ALL OF THE [150]KLINGONS[158]
530 [153]"BEFORE THE TIME LIMIT RUNS OUT.
540 PRINT"YOU WILL SEE COMMAND COME UP AS WELL
550 [153]"AS HEAR THE TONE INDICATING THAT
560 PRINT"YOU MUST INPUT A RESPONSE.
570 [153]"THE COMMANDS ARE:
580 PRINT"  1  [153] NAVIGATE[158] (SET COURSE)
590 [153]"  2   PRINTSHORT RANGE SCANSYS
600 PRINT"  3  [153] LONG RANGE SCAN[158]
610 [153]"  4   FIREPRINT PHASERSSYS
620 PRINT"  5   FIRE[153] PHOTON TORPEDOS [158]
630 [153]"  6   RAISE/LOWER PRINTSHIELD STRENGTHSYS
640 PRINT"  7  [153] DAMAGE CONTROL[158] REPORT
650 [153]"  8   ENABLE PRINTLIBRARY COMPUTERSYS
660 PRINT"  9   ENABLE [153]TRACTOR BEAM[158]
670 [141]60
700 [153]"LOADTO ACTIVATE ANY OF THE DEVICES ALL YOU
710 PRINT"NEED DO IS PRESS THE APPROPRIATE NUMBER
720 [153]"KEY. FOR PRINTPHASERSSYS TYPE A 4.
730 PRINT"IF YOU MAKE AN ERROR YOU'LL GET A LIST
735 [153]"OF CORRECT INPUT PROCEDURES.
740 PRINT"THE GALAXY IS DIVIDED INTO A 9 BY 9
750 [153]"QUADRANT GRID AND EACH QUADRANT IS
760 PRINT"FURTHER DIVIDED INTO AN 8 BY 8 GRID
770 [153]"AFTER YOU HAVE BEEN ASSIGNED A STARTING
780 PRINT"POSITION YOU WILL SEE A [153]SHORT RANGE
790 [153]"SCANSYS OF YOUR PRESENT POSITION, AT THIS
800 PRINT"POINT THE SIMULATION HAS BEGUN.
810 [153]"TO PRINTNAVIGATESYS YOU WILL BE ASKED TO INPUT
820 PRINT"A DIRECTION. THE
830 [153]"COURSE IS IN A               4  3  2SYS
840 PRINT"CIRCULAR NUMERICAL            [205] [194] [206]
850 [153]"VECTOR ARRANGEMENT          5SYSANDAND(null)PEEK(null)ANDAND1SYS
860 PRINT"AS SHOWN. INTEGER OR           [206][194][205]
870 [153]"REAL VALUES MAY BE USED.      (null) PEEK (null)
880 PRINT"(IE. 1.5 IS BETWEEN 1 AND 2) 6  7  8[158]
900 [141]60
1000 [153]"LOADFOR DISTANCE YOU WILL BE ASKED FOR WARP
1010 PRINT"FACTOR. YOU CAN INPUT ANY VALUE UP TO
1020 [153]"AND INCLUDING 8. WARP 1 WILL MOVE YOU
1030 PRINT"A ONE QUADRANT DISTANCE AS 5.5 WILL MOVE";
1040 PRINT"YOU 5 AND A HALF QUADRANTS.
1050 [153]"A BIT OF PRACTICE WILL HELP WITH THINGS.
1060 PRINT"THE REST OF THE DEVICES ARE STRAIGHT
1070 [153]"FORWARD AND WILL BE EXPLAINED IN THE
1080 PRINT"SIMULATION IT SELF. YOU WILL NOTE THE
1090 [153]"PRINTPHOTON TORPEDOSSYS ARE AIMED IN THE SAME
1100 PRINT"WAY [153]NAVIGATE[158] IS SET.
1110 [153]"THERE IS ALSO A PRINTTRACTOR BEAMSYS WHICH
1120 PRINT"CAN BE USED TO PULL IN A [150]KLINGON[158] IF HIS
1130 [153]"POWER LEVELS ARE VERY LOW.
1140 PRINT"THE [153]COMPUTER[158] HAS 5 FUNCTIONS AND IF
1150 [153]"YOU PLAY WITH THEM YOU'LL PICK UP THEIR
1160 PRINT"USES FASTER THAN I CAN EXPLAIN THEM.
1170 [141]60
2000 [153]"LOADTHE PRINTCOMPUTER LIBRARYSYS AND PRINTLONG RANGE
2005 PRINT"SCAN[158] ARE COLOUR CODED DEPENDING ON
2010 [153]"WHAT OR WHO IS IN WHICH QUADRANT.
2030 PRINT"THE COLOURS IN ORDER OF PRIORITY ARE:
2035 [153]"  OPENBLUE    218  ENTERPRISESYS LOACTION
2040 PRINT"  [150]RED     316  KLINGONS[158] PRESENT
2050 [153]"  PRINT#GREY    014  STARBASESYS PRESENT
2060 PRINT"  [153]GREEN   002  [158]SAFE QUADRANT
2070 [153]"  SYSYELLOW  ***  UNKNOWN AREA
2080 PRINT"WHAT THE NUMBERS MEANS IS SIMPLE
2090 [153]"FOR EXAMPLE THE OPEN218SYS ABOVE INDICATES:
2100 PRINT"  TOTAL [150]KLINGONS[158]:[159] 2 [158]- TWO [150]KLINGONS[158]
2110 [153]" TOTAL PRINT#STARBASESSYS:OPEN 1 SYS- ONE PRINT#STARBASESYS
2120 PRINT"     TOTAL STARS:[159] 8 [158]- EIGHT STARS
2130 [153]"IF A QUADRANT SHOWS NO STARS THEN IT
2140 PRINT"INDICATES A [150]NEBULA[158]. SCANS CAN'T
2150 [153]"PENITRATE THE GAS CLOUD OF A DEFNEBULASYS.
2800 GOSUB60
3000 PRINT"[147]THE [153]SHORT RANGE SCAN[158] MAY CONTAIN SEVERAL";
3010 PRINT"DIFFERENT OBJECTS. FIRST THERE WILL
3020 [153]"ALWAYS BE AN ENTERPRISESYS (UNLESS YOU BLOW";
3030 [153]"UP). IF YOUR NOT IN A DEFNEBULASYS,YOU WILL
3040 PRINT"WILL SEE DISTANT AND CLOSE STARS. THE
3050 [153]"STARS ARE FOR SHOW ONLY BUT THE CLOSE
3060 PRINT"ONES WILL BLOCK TORPEDO FIRE AND
3070 [153]"STARSHIP MOVEMENT.
3080 PRINT"THERE MAY ALSO BE A VERY TINY OBJECT
3090 [153]"WHICH LOOKS LIKE A BRIGHT (DISTANT) STAR";
3100 [153]". DON'T GO NEAR THIS, IT'S A DEFSPACEMINESYS
3110 PRINT"WHICH CAN RUIN YOU SIMULATION.
3120 [153]"THE OTHER OBJECTS ARE JUST THE DEFKLINGONSSYS
3130 PRINT"AND A [152]STARBASE[158], BOTH OF WHICH ARE EASY
3140 [153]"TO INDENTIFY.
3150 PRINT"FUTURE VERSIONS MAY HAVE OTHER SHIPS
3160 [153]"OF UNKNOWN ORIGIN. PRINTTACTICAL SENSERSSYS WILL";
3170 [153]"PROBE THE SHIP OR OBJECT.
3500 GOSUB60
4000 PRINT"[147]IF YOU ARE IN A [150]NEBULA[158] YOU WILL JUST
4010 [153]"SEE THE ENTERPRISESYS SURROUNDED BY A GAS
4020 PRINT"CLOUD. THE [153]LONG RANGE SCAN[158],[153] LIBRARY
4030 [153]"COMPUTERSYS,PRINT PHASERSSYS,PRINTTRACTOR BEAMSYS ANDPRINT
4040 PRINT"SHIELDS[158] WILL NOT FUNCTION IN THIS
4045 [153]"CONDITION.
4050 PRINT"THE OBJECT WILL BE TO FIND THE [150]KLINGON[158],
4060 [153]"IF HE'S THERE AT ALL. TO SEE HIM YOU
4070 PRINT"HAVE TO MOVE THE ENTERPRISE[158] ALONG SIDE
4080 [153]"OF HIM. HE WILL FIRE RANDOMLY WITH HIS
4090 PRINT"TOPEDOES SO WATCH OUT, REMEMBER YOUR
4100 [153]"PRINTSHIELDSSYS ARE OUT.
4110 PRINT"LEAVE ALL [150]NEBULAS[158] TO THE END BECAUSE
4120 [153]"IT REALLY CUTS INTO TO STARDATE TIME.
4130 PRINT"FOR EVERY DECIMAL (WARP) MOVE, YOUR
4140 [153]"STARDATE IS INCREASED BY THE SAME AMOUNT";
4150 [153]"TO A MAXIMUM OF 1.
4800 GOSUB60
5000 PRINT"[147]IN THIS VERSION OF [153]STAR TREK[158] THE
5010 [153]"DEFKLINGONS SYSWILL MOVE FROM QUADRANT TO
5020 PRINT"QUADRANT AS THE ENTERPRISE[158] MOVES TO
5030 [153]"THE NEXT QUADRANT. HOWEVER THE DEFKLINGONSYS
5040 PRINT"WON'T MOVE IF THE FOLLOWING IS TRUE:
5050 [153]"1. THE DEFKLINGONSYS IS GUARDING A PRINT#STARBASESYS
5060 PRINT"2. WITHIN 1 QUADRANT OF THE ENTERPRISE[158]
5070 [153]"3. NO DEFKLINGONSYS CAN BE FOUND (TO MOVE)
5080 PRINT"4. LOST IN A [150]NEBULA[158]
5090 [153]"ONLY ONE DEFKLINGONSYS WILL MOVE AT A TIME
5100 PRINT"(THIS CAN BE INCREASED IF NEEDED).
5110 [153]"ALSO INCLUDED IS A FEATURE THAT REQUIRES";
5120 [153]"THE USE OF A JOYSTICK. IF THEPRINT LIBRARY
5130 PRINT"COMPUTER[158] MALFUNCTIONS BEFORE A DOCKING
5140 [153]"PROCEDURE THEN YOU WILL BE REQUIRED TO
5150 PRINT"FLY THE ENTERPRISE [158]INTO THE DOCKING
5160 [153]"BAY. PLEASE BE CAREFUL AS YOU CAN ONLY
5170 PRINT"TOUCH THE DOCKING BAY FOR 2 SECONDS, ANY";
5180 PRINT"LONGER AND THE SIMULATION IS OVER
5190 [153]"(USE CONTROL PORT 2, PORT 1 WILL FOUL
5200 PRINT"UP THE OPERATION). YOU MUST FIX THE
5210 [153]"PRINTCOMPUTERSYS BEFORE YOU CALL THE PRINTSRSSYS AGAIN.";
5800 [141]60
6000 [153]"LOADYOU WILL NOTE THAT THE PRINTPHASERSSYS WILL
6010 PRINT"PASS THROUGH (OR AROUND) ALL THE
6020 [153]"OBJECTS ON THE PRINTSHORT RANGE SCANSYS. THIS
6030 PRINT"WILL BE CHANGED LATER.
6040 [153]"WHEN ADEF KLINGONSYS FIRES HE CAN'T HIT ANY
6050 PRINT"OF THE[150] SPACEMINES[158] OR OTHER [150]KLINGONS[158]
6060 [153]"SO DON'T BE CONFIDENT THAT HIS SHOT
6070 PRINT"WILL MISS YOU.
6080 [153]"THE REST OF THE INFORMATION CAN BE
6090 PRINT"PICKED UP AS YOU PLAY THE GAME. BUT
6100 [153]"BECAUSE OF THE DETAIL PUT INTO MOST OF
6110 PRINT"THE SYSTEMS, IT MAY TAKE A WHILE TO PICK";
6120 PRINT"UP HOW THEY WORK OR INTERACT WITH EACH
6130 [153]"OTHER. I MUST POINT OUT THAT MAJOR
6140 PRINT"CHANGES WERE MADE FROM THE ORIGINAL
6150 [153]"VERSION.
6160 PRINT"PLEASE WATCH FOR REALISM IN HOW THE
6170 [153]"SYSTEMS OPERATE.
6800 GOSUB60
7000 PRINT"[147]              [150]ATTENTION:[158]
7010 [153]"AS OF NOW, OPENVERSION IISYS IS AVAILABLE.
7020 PRINT"OVER 30 IMPROVEMENTS HAVE BEEN MADE AND
7030 [153]"SOME OF THESE INCLUDE:
7040 PRINT"1) PLANETS, SOME WITH A SATURN RING.
7050 [153]"2) IMPROVED CHARACTER SET.
7060 PRINT"3) BETTER [153]SHORT RANGE SCAN[158] WITH
7070 [153]"   CONTINUOUS MOTION.
7080 PRINT"4) ENTERPRISE[158] COMES INTO A NEW QUADRANT
7090 [153]"   SMOOTHLY RATHER THAN ABRUPTLY.
7100 PRINT"5) CONDITION RESET, THIS CORRECTS THE
7110 [153]"   CONDITION STATUS ON THEPRINT SRSSYS IF THE
7120 PRINT"   SITUATION ARISES.
7130 [153]"6) FASTER PRINTSRSSYS AND PRINTLIBRARY COMPUTERSYS
7140 PRINT"   PRESENTATION.
7150 [153]"7) NEW PRINTSRSSYS UNSERVICEABLE PRESENTATION.
7160 PRINT"8) LESS SCREEN SCROLLING.
7170 [153]"9) ABILITY TO TAKE PRISONERS AFTER THE
7180 PRINT"   [153]TRACTOR BEAM[158] PULLS THEM IN.
7185 [153]"10) YOU CAN INTERROGATE TO FIND OUT
7186 PRINT"    THE LOCATION OF OTHER [150]KLINGONS[158].
7190 [153]"11) A MINIATURE PRINTLIBRARY COMPUTERSYS ON THE
7200 PRINT"    [153]LONG RANGE SCAN[158], THIS HELPS IN THE
7210 [153]"    NAVIGATION OF THE ENTERPRISESYS.";
7990 [141]60
8000 [153]"LOAD DEF       VERSION II IMPROVEMENTS:SYS
8010 PRINT"12) NEW DISTANCE/DIRECTION CALCULATOR."
8020 PRINT"13) IMPROVED SOUND.
8030 [153]"14) FASTER BETWEEN QUADRANT TIME.
8040 PRINT"15) NEW AND ACCURATE [153]DAMAGE CONTROL[158]
8050 [153]"16) SELF DESTRUCT SEQUENCE IDENTICAL TO
8060 PRINT"    THE MOVIE [159]STAR TREK III, THE SEARCH
8070 [153]"    FOR SPOCKSYS. (HOPE I DIDN'T GIVE
8080 PRINT"    ANYTHING AWAY!)
8090 [153]"17) THE BEST IMPROVEMENT TO DATE - THE
8100 PRINT"    [150]KLINGONS[158] WILL FIRE FIRST IF YOU'RE
8110 [153]"    REACTION TIME IS SLOW.
8115 PRINT"18) A GENERAL CLEAN UP OF ALL SYSTEMS
8120 [153]
8130 [153]"ALSO THE MACHINE ROUTINES HAVE BEEN SET
8140 PRINT"UP TO BE VERY MODULAR TO ALLOW THE FOR
8150 [153]"LOADING OF EXTRA DATA OR GRAPHICS. THIS
8160 PRINT"WILL LET ME PROGRAM ADVENTURES BOTH
8170 [153]"ON AND OFF THE ENTERPRISESYS. THEY MAY
8180 PRINT"INCLUDE SUCH THINGS AS GOING DOWN ON
8190 [153]"PLANETS TO SEARCH FOR DI-LITHIUM
8200 PRINT"CRYISTALS OR TO GO ABOARD A [150]KLINGON[158]
8210 [153]"BATTLE CRUISE.  ALMOST ANYTHING IS
8220 PRINT"POSSIBLE.";
8990 GOSUB60
9000 PRINT"[147]BECAUSE OF THE RESPONSE TO VERSION I,
9005 [153]"FROM ALL OVER NORTH AMERICA AND EUROPE,
9010 PRINT"I'VE STARTED A [159]STAR TREK CLUB[158] IN WHICH
9020 [153]"ONLY THE MEMBERS WILL GET OPENVERSION IISYS.
9030 PRINT"
9040 [153]"CLUB MEMBERS WILL RECEIVE A REGULAR
9050 PRINT"NEWSLETTER WITH TIPS ON PLAYING
9060 [153]"STRATIGIES AND WHO HAS THE HIGHEST
9070 PRINT"EFFICIENCY RATING. MANY MORE IDEAS ARE
9080 [153]"PLANNED IN THIS AREA.
9090 PRINT"
9100 [153]"TO JOIN THE CLUB AND GET A DISK, YOU
9110 PRINT"MUST SENT IN $4.00 MEMBERSHIP FEE (TO
9120 [153]"COVER MAILING COSTS) AND $18.00 FOR THE
9130 PRINT"ACTUAL DISK, (OR $15.00 IF YOU SUPPLY
9140 [153]"THE DISK) PLUS APPLICABLE SALES TAX.
9150 PRINT"
9160 [153]"ONLY THE PEOPLE WHO JOIN THE CLUB WILL
9170 PRINT"BE ABLE TO RECEIVE [159]VERSION III[158], WHICH
9180 [153]"IS NOW UNDERWAY.  IT WILL HAVE A WHOLE
9190 PRINT"HOST OF NEW SYSTEMS THAT WOULD EVEN
9200 [153]"IMPRESS MR. SPOCK. ONLY MEMBERS WILL
9210 PRINT"FIND OUT WHAT THEY ARE!
9990 [141]60
10000 [153]"LOAD  SO TO JOIN THE CLUB JUST SEND A NOTE
10010 PRINT"PLUS PAYMENT TO THE ADDRESS BELOW AND
10020 [153]"BEFORE YOU KNOW IT, YOU'LL BE PLAYING
10030 PRINT"[159]STAR TREK V2[158].
10040 [153]"
10050 PRINT" IF YOU HAVE ANY QUESTIONS AT ALL, JUST
10060 [153]"CALL OR SENT ME A LETTER AND I'LL TRY
10070 PRINT"TO HELP YOU OUT.  I'M ALSO OPEN TO
10080 [153]"IDEAS OR SUGGESTION WHICH CAN BE PUT
10090 PRINT"INTO THE GAME.
19000 [153]"I'D LIKE TO THANK GEOFF SOLOMON AND
19040 PRINT"JOHN PAUL BRADFORD FOR THEIR HELP IN
19050 [153]"GETTING THE SYSTEMS REALISTIC.
19090 PRINT"         GOOD LUCK CAPTAIN...[158]
19100 [153]"          BY: DAVE NEALE
19110 PRINT"              P.O. BOX 1324
19120 [153]"              MEAFORD, ONTARIO
19130 PRINT"              N0H-1Y0  (519) 538-1758
19800 [153]"LOAD";[199](34);"STAR TREK BOOT.C";[199](34);",8ONONON"